﻿<%@ Page Language="vb" AutoEventWireup="false" CodeBehind="Ida.aspx.vb" Inherits="WebApplication2.Ida" %>

<!DOCTYPE html>

<html xmlns="http://www.w3.org/1999/xhtml">
<head id="Head1" runat="server">
    <script runat="server">
        Sub EnviarPorCookies(ByVal s As Object, ByVal e As EventArgs)
            ' Representa un elemento de datos en un control de lista enlazado a datos.
            Dim item As ListItem
            ' String que contendra el valor de los items seleccionados
            Dim selecteditems As String = ""
            ' Recorro todos los items de CheckBoxList1
            For Each item In CheckBoxList1.Items
                ' Si el item esta seleccionado lo agrego al string selecteditems
                If item.Selected Then
                    selecteditems &= item.Text & "<br />"
                    Response.Cookies("Cookie")(item.Value) = item.Value
                End If
            Next
            ' Si selecteditems posee datos los redirecciono a la pagina de vuelta
            ' Caso contrario informo al usuario que no hay items seleccionados
            If selecteditems.Length > 0 Then
                Response.Redirect("Vuelta.aspx")
            Else
                MsgBox("No hay items seleccionados. Seleccione al menos uno y vuelva a intentar.", MsgBoxStyle.Exclamation, "Error")
            End If
        End Sub
    </script>
    <title>Pagina de Ida</title>
</head>
<body>
    <form id="form1" runat="server">
    <div>
        <asp:Label ID="Label1" runat="server" Text="Elija un dia de actividad"></asp:Label>
        <br /><br />
        <%-- Creo el control CheckBoxList con sus respectivos items --%>
        <asp:CheckBoxList ID="CheckBoxList1" runat="server">
            <asp:ListItem Text="Lunes" Value="Lunes"></asp:ListItem>
            <asp:ListItem Text="Martes" Value="Martes"></asp:ListItem>
            <asp:ListItem Text="Miercoles" Value="Miercoles"></asp:ListItem>
            <asp:ListItem Text="Jueves" Value="Jueves"></asp:ListItem>
            <asp:ListItem Text="Viernes" Value="Viernes"></asp:ListItem>
        </asp:CheckBoxList>
        <br />
        <asp:Button ID="Button1" runat="server" Text="Enviar" OnClick="EnviarPorCookies" />
    </div>
    </form>
</body>
</html>
